ocr: frmContact Properties FE D V Querhere Sub quenywnere(conamion as String) imherited.QueryWheret condition ) judpQueryStr = condition lstContacts.Translation = =SELECT lastname I'' II firstname, contactid FROM contact WHERE rr &6 condition & rr ORDER BY lastname, firstname ASC" DIM rec AS Object rec == frmContact.GetRecordset() rNumRows == rec.GetRow(ount ( txtContacts.Label = "Addresses for Ir & trmcontact.udpselectedTab & "...' - - - (" & CSTR( rNumRows ) &6 rr records)" IF rNumRows = 0 THEN btnPhone.Visible = FALSE ELSE btnPhone.Visible == TRUE END IF rCont actid = rec.GetColvall CONTACTID" ) ...